<!--#include file="lib/utf-8.asp"-->
<!--#include file="lib/JSON2.asp"-->
<%
'Response.ContentType = "application/json"

'a="[[{""x"":1,""y"":2},{""x"":1,""y"":1},{""x"":1,""y"":1}],[{""x"":1,""y"":1},{""x"":1,""y"":1},{""x"":1,""y"":1},{""x"":1,""y"":1}]]"
'response.write a

Dim a(1,1,1)

a(0,0,0) = "数"
a(0,0,1) = "0,0,1"
a(0,1,0) = "0,1,0"
a(0,1,1) = "0,1,1"
a(1,0,0) = "1,0,0"
a(1,0,1) = "1,0,1"
a(1,1,0) = "1,1,0"
a(1,1,1) = "1,1,1"

Response.Write JSON.stringify(a)


%>


